home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / News Stacks / Jan '90AMUG News™.cpt / Jan '90AMUG News™ / card_2934.txt < prev    next >
Text File  |  1990-01-21  |  13KB  |  648 lines
  1. -- card: 2934 from stack: in
  2. -- bmap block id: 3197
  3. -- flags: 0000
  4. -- background id: 2628
  5. -- name: Index
  6. ----- HyperTalk script -----
  7. on CloseCard
  8.   push card
  9. end CloseCard
  10.  
  11.  
  12.  
  13. -- part 9 (field)
  14. -- low flags: 00
  15. -- high flags: 0000
  16. -- rect: left=34 top=240 right=307 bottom=235
  17. -- title width / last selected line: 0
  18. -- icon id / first selected line: 0 / 0
  19. -- text alignment: 0
  20. -- font id: 2
  21. -- text size: 10
  22. -- style flags: 0
  23. -- line height: 13
  24. -- part name: 
  25.  
  26.  
  27. -- part 4 (field)
  28. -- low flags: 00
  29. -- high flags: 0000
  30. -- rect: left=34 top=193 right=224 bottom=192
  31. -- title width / last selected line: 0
  32. -- icon id / first selected line: 0 / 0
  33. -- text alignment: 0
  34. -- font id: 2
  35. -- text size: 10
  36. -- style flags: 0
  37. -- line height: 13
  38. -- part name: 
  39.  
  40.  
  41. -- part 6 (field)
  42. -- low flags: 00
  43. -- high flags: 0000
  44. -- rect: left=187 top=192 right=209 bottom=209
  45. -- title width / last selected line: 0
  46. -- icon id / first selected line: 0 / 0
  47. -- text alignment: 0
  48. -- font id: 2
  49. -- text size: 12
  50. -- style flags: 256
  51. -- line height: 16
  52. -- part name: 
  53.  
  54.  
  55. -- part 8 (field)
  56. -- low flags: 01
  57. -- high flags: 0000
  58. -- rect: left=34 top=223 right=240 bottom=132
  59. -- title width / last selected line: 0
  60. -- icon id / first selected line: 0 / 0
  61. -- text alignment: 0
  62. -- font id: 2
  63. -- text size: 12
  64. -- style flags: 1280
  65. -- line height: 16
  66. -- part name: 
  67.  
  68.  
  69. -- part 11 (field)
  70. -- low flags: 00
  71. -- high flags: 0000
  72. -- rect: left=231 top=238 right=255 bottom=255
  73. -- title width / last selected line: 0
  74. -- icon id / first selected line: 0 / 0
  75. -- text alignment: 0
  76. -- font id: 2
  77. -- text size: 12
  78. -- style flags: 256
  79. -- line height: 16
  80. -- part name: 
  81.  
  82.  
  83. -- part 12 (field)
  84. -- low flags: 00
  85. -- high flags: 0000
  86. -- rect: left=231 top=252 right=269 bottom=255
  87. -- title width / last selected line: 0
  88. -- icon id / first selected line: 0 / 0
  89. -- text alignment: 0
  90. -- font id: 2
  91. -- text size: 12
  92. -- style flags: 256
  93. -- line height: 16
  94. -- part name: 
  95.  
  96.  
  97. -- part 13 (field)
  98. -- low flags: 00
  99. -- high flags: 0000
  100. -- rect: left=257 top=226 right=256 bottom=465
  101. -- title width / last selected line: 0
  102. -- icon id / first selected line: 0 / 0
  103. -- text alignment: 0
  104. -- font id: 2
  105. -- text size: 10
  106. -- style flags: 0
  107. -- line height: 13
  108. -- part name: 
  109.  
  110.  
  111. -- part 15 (field)
  112. -- low flags: 00
  113. -- high flags: 0000
  114. -- rect: left=460 top=207 right=224 bottom=482
  115. -- title width / last selected line: 0
  116. -- icon id / first selected line: 0 / 0
  117. -- text alignment: 0
  118. -- font id: 2
  119. -- text size: 12
  120. -- style flags: 256
  121. -- line height: 16
  122. -- part name: 
  123.  
  124.  
  125. -- part 16 (field)
  126. -- low flags: 00
  127. -- high flags: 0000
  128. -- rect: left=232 top=265 right=282 bottom=254
  129. -- title width / last selected line: 0
  130. -- icon id / first selected line: 0 / 0
  131. -- text alignment: 0
  132. -- font id: 2
  133. -- text size: 12
  134. -- style flags: 256
  135. -- line height: 16
  136. -- part name: 
  137.  
  138.  
  139. -- part 17 (field)
  140. -- low flags: 00
  141. -- high flags: 0000
  142. -- rect: left=232 top=278 right=295 bottom=254
  143. -- title width / last selected line: 0
  144. -- icon id / first selected line: 0 / 0
  145. -- text alignment: 0
  146. -- font id: 2
  147. -- text size: 12
  148. -- style flags: 256
  149. -- line height: 16
  150. -- part name: 
  151.  
  152.  
  153. -- part 18 (button)
  154. -- low flags: 00
  155. -- high flags: 2000
  156. -- rect: left=31 top=192 right=206 bottom=204
  157. -- title width / last selected line: 0
  158. -- icon id / first selected line: 0 / 0
  159. -- text alignment: 1
  160. -- font id: 0
  161. -- text size: 12
  162. -- style flags: 0
  163. -- line height: 16
  164. -- part name: 
  165. ----- HyperTalk script -----
  166. on mouseUp
  167.   visual iris open very slowly
  168.   go to card "President"
  169.   Play "Welcome to AMUG"
  170.   dispPICT "Mike"
  171. end mouseUp
  172.  
  173.  
  174.  
  175. -- part 19 (button)
  176. -- low flags: 00
  177. -- high flags: 2000
  178. -- rect: left=314 top=310 right=330 bottom=344
  179. -- title width / last selected line: 0
  180. -- icon id / first selected line: 2749 / 2749
  181. -- text alignment: 1
  182. -- font id: 0
  183. -- text size: 12
  184. -- style flags: 0
  185. -- line height: 16
  186. -- part name: Forward
  187. ----- HyperTalk script -----
  188. on mouseUp
  189.   visual wipe left slowly
  190.   go to next card
  191. end mouseUp
  192.  
  193.  
  194.  
  195. -- part 22 (button)
  196. -- low flags: 00
  197. -- high flags: 2000
  198. -- rect: left=31 top=254 right=268 bottom=259
  199. -- title width / last selected line: 0
  200. -- icon id / first selected line: 0 / 0
  201. -- text alignment: 1
  202. -- font id: 0
  203. -- text size: 12
  204. -- style flags: 0
  205. -- line height: 16
  206. -- part name: 
  207. ----- HyperTalk script -----
  208. on mouseUp
  209.   visual iris open very slowly
  210.   go to card 10
  211. end mouseUp
  212.  
  213.  
  214.  
  215. -- part 25 (button)
  216. -- low flags: 00
  217. -- high flags: 2000
  218. -- rect: left=31 top=266 right=280 bottom=259
  219. -- title width / last selected line: 0
  220. -- icon id / first selected line: 0 / 0
  221. -- text alignment: 1
  222. -- font id: 0
  223. -- text size: 12
  224. -- style flags: 0
  225. -- line height: 16
  226. -- part name: 
  227. ----- HyperTalk script -----
  228. on mouseUp
  229.   visual iris open very slowly
  230.   go to card 12
  231. end mouseUp
  232.  
  233.  
  234.  
  235. -- part 26 (button)
  236. -- low flags: 00
  237. -- high flags: 2000
  238. -- rect: left=31 top=240 right=255 bottom=259
  239. -- title width / last selected line: 0
  240. -- icon id / first selected line: 0 / 0
  241. -- text alignment: 1
  242. -- font id: 0
  243. -- text size: 12
  244. -- style flags: 0
  245. -- line height: 16
  246. -- part name: 
  247. ----- HyperTalk script -----
  248. on mouseUp
  249.   visual iris open very slowly
  250.   go to card 9
  251. end mouseUp
  252.  
  253.  
  254.  
  255. -- part 30 (field)
  256. -- low flags: 00
  257. -- high flags: 0000
  258. -- rect: left=257 top=196 right=230 bottom=465
  259. -- title width / last selected line: 0
  260. -- icon id / first selected line: 0 / 0
  261. -- text alignment: 0
  262. -- font id: 2
  263. -- text size: 10
  264. -- style flags: 0
  265. -- line height: 13
  266. -- part name: 
  267.  
  268.  
  269. -- part 23 (button)
  270. -- low flags: 00
  271. -- high flags: 2000
  272. -- rect: left=259 top=196 right=211 bottom=488
  273. -- title width / last selected line: 0
  274. -- icon id / first selected line: 0 / 0
  275. -- text alignment: 1
  276. -- font id: 0
  277. -- text size: 12
  278. -- style flags: 0
  279. -- line height: 16
  280. -- part name: 
  281. ----- HyperTalk script -----
  282. on mouseUp
  283.   visual iris open very slowly
  284.   go to card 26
  285. end mouseUp
  286.  
  287.  
  288.  
  289. -- part 28 (button)
  290. -- low flags: 00
  291. -- high flags: 2000
  292. -- rect: left=284 top=310 right=330 bottom=314
  293. -- title width / last selected line: 0
  294. -- icon id / first selected line: 25234 / 25234
  295. -- text alignment: 1
  296. -- font id: 0
  297. -- text size: 12
  298. -- style flags: 0
  299. -- line height: 16
  300. -- part name: rewind
  301. ----- HyperTalk script -----
  302. on mouseUp
  303.   visual wipe right slowly
  304.   go to last card
  305. end mouseUp
  306.  
  307.  
  308.  
  309. -- part 29 (button)
  310. -- low flags: 00
  311. -- high flags: 2000
  312. -- rect: left=425 top=291 right=313 bottom=455
  313. -- title width / last selected line: 0
  314. -- icon id / first selected line: 2167 / 2167
  315. -- text alignment: 1
  316. -- font id: 0
  317. -- text size: 12
  318. -- style flags: 0
  319. -- line height: 16
  320. -- part name: instruct
  321. ----- HyperTalk script -----
  322. on mouseUp
  323.   visual wipe left slowly
  324.   go to next card
  325. end mouseUp
  326.  
  327.  
  328.  
  329. -- part 32 (field)
  330. -- low flags: 00
  331. -- high flags: 0000
  332. -- rect: left=461 top=223 right=240 bottom=483
  333. -- title width / last selected line: 0
  334. -- icon id / first selected line: 0 / 0
  335. -- text alignment: 0
  336. -- font id: 2
  337. -- text size: 12
  338. -- style flags: 256
  339. -- line height: 16
  340. -- part name: 
  341.  
  342.  
  343. -- part 33 (button)
  344. -- low flags: 00
  345. -- high flags: 2000
  346. -- rect: left=32 top=280 right=293 bottom=259
  347. -- title width / last selected line: 0
  348. -- icon id / first selected line: 0 / 0
  349. -- text alignment: 1
  350. -- font id: 0
  351. -- text size: 12
  352. -- style flags: 0
  353. -- line height: 16
  354. -- part name: 
  355. ----- HyperTalk script -----
  356. on mouseUp
  357.   visual iris open very slowly
  358.   go to card 15
  359. end mouseUp
  360.  
  361.  
  362.  
  363. -- part 34 (button)
  364. -- low flags: 00
  365. -- high flags: 2000
  366. -- rect: left=258 top=225 right=240 bottom=491
  367. -- title width / last selected line: 0
  368. -- icon id / first selected line: 0 / 0
  369. -- text alignment: 1
  370. -- font id: 0
  371. -- text size: 12
  372. -- style flags: 0
  373. -- line height: 16
  374. -- part name: 
  375. ----- HyperTalk script -----
  376. on mouseUp
  377.   visual iris open very slowly
  378.   go to card 37
  379. end mouseUp
  380.  
  381.  
  382.  
  383. -- part 35 (button)
  384. -- low flags: 00
  385. -- high flags: A000
  386. -- rect: left=390 top=117 right=176 bottom=490
  387. -- title width / last selected line: 0
  388. -- icon id / first selected line: 4212 / 4212
  389. -- text alignment: 1
  390. -- font id: 0
  391. -- text size: 12
  392. -- style flags: 0
  393. -- line height: 16
  394. -- part name: AMUG NEWS Jan '89
  395. ----- HyperTalk script -----
  396. on mouseUp
  397.   answer "Copy this button to your Home?" with "Yes" or "No"
  398.   if it is "No" then exit mouseUp
  399.   put userlevel into oldUser
  400.   put the short name of the target into Spot
  401.   put spot
  402.   push this card
  403.   set userlevel to 5
  404.  
  405.   put "on mouseUp" & return into myScript
  406.   put "go stack" && quote & Spot & quote & return after myScript
  407.   put "end mouseUp" after myScript
  408.  
  409.   select the target
  410.   doMenu "Copy Button"
  411.   visual Dissolve slowly
  412.   go to stack "Home"
  413.   doMenu "Paste Button"
  414.   show message box
  415.   put "Move the button to a good location"
  416.   wait until the mouse is down
  417.   set hilite of button Spot to true
  418.  
  419.   repeat until the mouse is up
  420.     set loc of button Spot to the mouseLoc
  421.   end repeat
  422.  
  423.   set hilite of button Spot to false
  424.  
  425.   hide message box
  426.   set userlevel to 5
  427.  
  428.   put oldUser into userlevel
  429.  
  430.   set the script of button Spot to myScript
  431.   choose Browse Tool
  432.   pop card
  433. end mouseUp
  434.  
  435.  
  436.  
  437.  
  438. -- part 36 (field)
  439. -- low flags: 00
  440. -- high flags: 0000
  441. -- rect: left=461 top=237 right=254 bottom=483
  442. -- title width / last selected line: 0
  443. -- icon id / first selected line: 0 / 0
  444. -- text alignment: 0
  445. -- font id: 2
  446. -- text size: 12
  447. -- style flags: 256
  448. -- line height: 16
  449. -- part name: 
  450.  
  451.  
  452. -- part 37 (button)
  453. -- low flags: 00
  454. -- high flags: 2000
  455. -- rect: left=258 top=239 right=254 bottom=491
  456. -- title width / last selected line: 0
  457. -- icon id / first selected line: 0 / 0
  458. -- text alignment: 1
  459. -- font id: 0
  460. -- text size: 12
  461. -- style flags: 0
  462. -- line height: 16
  463. -- part name: 
  464. ----- HyperTalk script -----
  465. on mouseUp
  466.   visual iris open very slowly
  467.   go to card 40
  468. end mouseUp
  469.  
  470.  
  471.  
  472. -- part 39 (field)
  473. -- low flags: 00
  474. -- high flags: 0000
  475. -- rect: left=186 top=204 right=221 bottom=208
  476. -- title width / last selected line: 0
  477. -- icon id / first selected line: 0 / 0
  478. -- text alignment: 0
  479. -- font id: 2
  480. -- text size: 12
  481. -- style flags: 256
  482. -- line height: 16
  483. -- part name: 
  484.  
  485.  
  486. -- part 40 (button)
  487. -- low flags: 00
  488. -- high flags: 2000
  489. -- rect: left=31 top=206 right=221 bottom=210
  490. -- title width / last selected line: 0
  491. -- icon id / first selected line: 0 / 0
  492. -- text alignment: 1
  493. -- font id: 0
  494. -- text size: 12
  495. -- style flags: 0
  496. -- line height: 16
  497. -- part name: 
  498. ----- HyperTalk script -----
  499. on mouseUp
  500.   visual iris open very slowly
  501.   go to card 36
  502. end mouseUp
  503.  
  504.  
  505.  
  506. -- part 41 (field)
  507. -- low flags: 00
  508. -- high flags: 0000
  509. -- rect: left=232 top=289 right=306 bottom=254
  510. -- title width / last selected line: 0
  511. -- icon id / first selected line: 0 / 0
  512. -- text alignment: 0
  513. -- font id: 2
  514. -- text size: 12
  515. -- style flags: 256
  516. -- line height: 16
  517. -- part name: 
  518.  
  519.  
  520. -- part 42 (button)
  521. -- low flags: 00
  522. -- high flags: 2000
  523. -- rect: left=32 top=292 right=308 bottom=259
  524. -- title width / last selected line: 0
  525. -- icon id / first selected line: 0 / 0
  526. -- text alignment: 1
  527. -- font id: 0
  528. -- text size: 12
  529. -- style flags: 0
  530. -- line height: 16
  531. -- part name: 
  532. ----- HyperTalk script -----
  533. on mouseUp
  534.   visual iris open very slowly
  535.   go to card 20
  536. end mouseUp
  537.  
  538.  
  539.  
  540. -- part 43 (field)
  541. -- low flags: 00
  542. -- high flags: 0000
  543. -- rect: left=460 top=194 right=211 bottom=482
  544. -- title width / last selected line: 0
  545. -- icon id / first selected line: 0 / 0
  546. -- text alignment: 0
  547. -- font id: 2
  548. -- text size: 12
  549. -- style flags: 256
  550. -- line height: 16
  551. -- part name: 
  552.  
  553.  
  554. -- part 44 (button)
  555. -- low flags: 00
  556. -- high flags: 2000
  557. -- rect: left=259 top=210 right=224 bottom=488
  558. -- title width / last selected line: 0
  559. -- icon id / first selected line: 0 / 0
  560. -- text alignment: 1
  561. -- font id: 0
  562. -- text size: 12
  563. -- style flags: 0
  564. -- line height: 16
  565. -- part name: 
  566. ----- HyperTalk script -----
  567. on mouseUp
  568.   visual iris open very slowly
  569.   go to card 31
  570. end mouseUp
  571.  
  572.  
  573.  
  574. -- part contents for card part 4
  575. ----- text -----
  576. The PRESIDENT'S Desk...........
  577. Meeting News.........................
  578.  
  579.  
  580.  
  581. -- part contents for card part 6
  582. ----- text -----
  583. 3
  584.  
  585.  
  586.  
  587. -- part contents for card part 8
  588. ----- text -----
  589. Articles
  590.  
  591. -- part contents for card part 9
  592. ----- text -----
  593. PIPE Dream............................................
  594. Cat............................................................
  595. The Hobbyist Mac.................................
  596. Off With Their Tails..............................
  597. One Man's Vice......................................
  598.  
  599. -- part contents for card part 11
  600. ----- text -----
  601. 8
  602.  
  603. -- part contents for card part 12
  604. ----- text -----
  605. 10
  606.  
  607. -- part contents for card part 13
  608. ----- text -----
  609. Disk by Mail............................................
  610. Library News .........................................
  611.  
  612.  
  613. -- part contents for card part 15
  614. ----- text -----
  615. 30
  616.  
  617. -- part contents for card part 16
  618. ----- text -----
  619. 11
  620.  
  621. -- part contents for card part 17
  622. ----- text -----
  623. 14
  624.  
  625. -- part contents for card part 30
  626. ----- text -----
  627. America Online Debuts..........................
  628. Bits and Pieces.........................................
  629.  
  630. -- part contents for card part 32
  631. ----- text -----
  632. 36
  633.  
  634. -- part contents for card part 36
  635. ----- text -----
  636. 39
  637.  
  638. -- part contents for card part 39
  639. ----- text -----
  640. 35
  641.  
  642. -- part contents for card part 41
  643. ----- text -----
  644. 19
  645.  
  646. -- part contents for card part 43
  647. ----- text -----
  648. 25